home *** CD-ROM | disk | FTP | other *** search
/ 1st Multimedia Mac Shareware / Multimedia Shareware CD-ROM - BetaCorp.iso / Comedy / Cookie / Fortune Cookies / stack_-1.xml < prev   
Encoding:
Extensible Markup Language  |  1992-08-11  |  2.0 KB  |  30 lines
  1. <?xml version="1.0" encoding="utf-8" ?>
  2. <!DOCTYPE stack PUBLIC "-//Apple, Inc.//DTD stack V 2.0//EN" "" >
  3. <stack>
  4.     <name>in</name>
  5.     <id>-1</id>
  6.     <cardCount>9</cardCount>
  7.     <cardID>159264</cardID>
  8.     <listID>4383</listID>
  9.     <cantModify><false /></cantModify>
  10.     <cantDelete><false /></cantDelete>
  11.     <cantAbort><false /></cantAbort>
  12.     <cardSize>
  13.         <width>512</width>
  14.         <height>342</height>
  15.     </cardSize>
  16.     <script>-- The acutal fortunes begin at the card after the card labelled
  17. -- "Control Card" and this function picks a random card from that
  18. -- portion of the stack. NOTE: this function is also used by the
  19. -- background script
  20. function randomCardNumber
  21. put the number of card "Control Card" into frontCards
  22. return random(the number of cards - frontCards) + frontCards
  23. end randomCardNumber
  24.  
  25. on openStack
  26. show field "Your fortune" of card 1
  27. hide menubar
  28. end openStack
  29.  
  30. on closeStack
  31. show menubar
  32. hide field "Your fortune" of card 1
  33. if the number of cards > the number of card "Control Card"
  34. then put field "Your fortune" of card randomCardNumber()¬¨
  35. into field "Your fortune" of card 1
  36. end closeStack
  37. </script>
  38.     <background id="2079" file="background_2079.xml" name="Title" />
  39.     <background id="2694" file="background_2694.xml" name="Fortune" />
  40.     <background id="69087" file="background_69087.xml" name="" />
  41.     <card id="159264" file="card_159264.xml" marked="false" name="Sample Card" owner="2694" />
  42.     <card id="112488" file="card_112488.xml" marked="false" name="Flip book 1" owner="69087" />
  43.     <card id="3597" file="card_3597.xml" marked="false" name="" owner="69087" />
  44.     <card id="3856" file="card_3856.xml" marked="false" name="" owner="69087" />
  45.     <card id="47198" file="card_47198.xml" marked="false" name="" owner="69087" />
  46.     <card id="134359" file="card_134359.xml" marked="false" name="" owner="69087" />
  47.     <card id="207242" file="card_207242.xml" marked="false" name="" owner="69087" />
  48.     <card id="221303" file="card_221303.xml" marked="false" name="" owner="69087" />
  49.     <card id="152765" file="card_152765.xml" marked="false" name="Control Card" owner="2079" />
  50. </stack>
  51.